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SUBJECT. FRAP^ - AN ASSEMBLY FOR PDP-1 



TO PDP Distribution List FROM Edward predkin 



Frap is designed to operate on a PDP-1 computer with at least 
1024 words of memory and the minimum set of in-out equipment. The 
assembly program will accept as input, a paper tape, produced by a 
flexowriter- The tape is an isomorphic representation of the informatic 
contained in a typewritten program. 

The symbolic program has two levels of structure. (1) The 
program is a sequence of statements and (2) a statement is a sequence 
of words. We adopt the following conventions to delimit statements; 
the words on one line of the typewritten program constitute one 
statement. We see that the carriage return is a delimiter with 
respect to statements. 

To delimit words, we allow a larger set of delimiters. A word 
is, at present, that ordered string of characters^ occurring between 
any two delimiters. We do not admit that string consisting of zero 
characters to the class of words. One may overdefine by saying that 
a delimiter followed by a delimiter is again - a delimiter. The 
delimiters with respect to words are: the space , .the tab , the comma, 
and the carriage return . The comma is used to initiate a comment - 
the rule is that all words and delimiters following a comma (in a 
statement) are ignored by Frap. A statement may start with a comma, 
in which case the whole statement is ignored. 

The Use of Words as Symbols 

Most words are used as symbols that will have a numerical value. 
A typical example would be the use of the word "add" as a symbol 



1. Acknov/ledqment 

The FRAP program and this memorandum were supplied to DEC by 
Mr. Edward Fredkin of Bolt, Beranek, & Newman, Cambridge, Mass. 

2. A "character" being any key on the typewriter, including such 
as upper case , backspace , etc. 
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whose value equals 400000o. To represent an octal number, we use a 
word that contains only digits. The word "120377, " which is a number ^ 
is a symbol whose value equals 120377o= (In general, numbers will 
be symbols whose value is indicated by the number itself and all 
numbers are octal.) Some words (control words) are used as symbols 
for procedures that one wishes Frap to follow in order to control or 
modify various aspects of the assembly^ 

We may say that the function of the compiler is to: (1) accept 
a tape representing a program and to establish a correspondence 
between each type of word and some numerical value, (2) to replace 
each token of a word by the value assigned to its type, (3) to combine, 
within each statement, the values assigned into an output item^ 
(4) to produce an output tape which^ when read into the computer, 
will result in a block of successive registers containing the successive 
output items, and (5) to allow variations of and exceptions to the 
above rules by means of control words. 

Each word in a statement may contribute some numerical value to 
the item that will be put out to correspond to the statement. We 
adopt the convention of combining values of words within a statement 
by means of the inclusive or instruction (ior) . 

Some words do not actually contribute numerically to the output 
itemo Examples are labels and control words. A label is always the 
first word in a statement c There i-s a rule that if the first word in 
a statement is undefined, i.ec, Frap does not have a numeric value 
that corresponds to it, Frap considers it to be the label of that 
statement. This label may be used anywhere in the program to refer 
to the statement so labeled o If the first word in a statement is 
defined, it is not a label o 

Writing A Program 

The first statement in a program is usually a comment that 
includes the name of the program, the date, and perhaps a description 
of the program. Next there might be some opd statements defining 
various non-standard symbols o (When Frap is loaded into the computer 
it has in its tables the definitions of all of the standard operation 
codes, as listed in the PDP-1 Manual published by the Digital Equip- 
ment Corporation,) This is most often followed by an org statement 
which designates the area of memory into which the program is to be 



The number is not decimal, but rather octal; to the base 8. 
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placed Not starting with an org statement is equivalent to starting 
with "org 0," i.e.-, the program will start at register zero. The 
program follows, as a series of statements, and may be terminated 
by an end statement, 

The Output 

Frap will produce an output tape in read in mode . This tape 
will load itself in the proper area of memory if it is placed in the 
reader, and if the read in switch is activated ^ 

It is desirable to terminate a read in mode tape by a jump to 
some location. The control word "end" will punch a final item on the 
tape equivalent to the words, in the statement, to the left of the 
word "endo " This final item is not one that is stored in memory, 
but rather one that is interpreted by the read in mode. 

The Procedure for Assembling a Program 

In If Frap is not already in memory, place the Frap tape in 
the reader and activate READ IN . A stop with 1 or 7725 in the 
program counter is normal; a stop with 7745 in the program counter 
indicates a check sum error. 

2c Set sense switches to desired positions. 

3 . Turn the punch on o 

4. Place the symbolic tape in the reader and start at register '. 
After the tape stops reading (the completion of the first pass) re- 
position the tape and activate the continue switch o The computer 
will read the symbolic tape and punch the output tape (the second 
pass) . At the end of each pass, the computer will stop with 27^ in 
the program counter.. 
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The Control Words Available in Frap 

1, opd (operation definition) This operator is used to 
assign a value to the symbol following "opd. " The value assigned 
to the symbol is that value indicated by all items to the right of 
the symbol being defined o "opd" is used to define the operation 
codes, shift numbers, etCo The opd statement must precede all other 
occurrences of the symbol being defined o 

e^go "opd jmp 600000, defines the operation jmp 
opd * 010000, the defer bit 
opd minus 1-1, constant -1 
opd multiply jsp mult, why write jsp?" 

An opd statement does not result in an item on the output tape, 

2c org (origin) c This operator is used to reset the compiler's 
location counter c The location counter is made equal to the value of 
the org statement c The effect of an org statement is to cause Frap 
to place the following program in a block that starts in the location 
specified by the origin. "org" may be used anywhere in the program, 
and as often as desired. 

ecgo normal use: "org 172, program starts in 172" 
other uses: "org A + 3 

jmp patch, jmp to patch 
org 1000, insert patch 
patch lac C 

dac D 
jmp A + 4, return" 

An org statement does not result in an item on the output tape^ 

3. * (indirect addressing) The "*" is defined as a ONE in 
the indirect addressing bit position (bit 5) c The definition state- 
ment is opd * 10000 o 

e„go "lac * A" 

4„ si, s2, s3 .o.s9 (^hift and rotate numbers) Since a shift 
or rotate reqiiires a number in the unary* number system rather than 
binary, "si" through "s9" are defined as 1-9, in unary. The 
definition statements are: 



* In the unary niamber system, the number of ones, or markers, is 
equal to the value of the number. 
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"opd si 1 

opd s2 3 

opd s3 7 

opd s4 17 

opd s5 37 

opd s6 77 

opd s7 177 

opd s8 377 

opd s9 777" 

e.go "ral s8, rotate accumulator to the left, eight bitSo" 

5o loc (the location of the following symbol) Normally Frap 
assiimes that every symbol in a statement is to be combined into the 
output wordc The exception is when a symbol is used as the label 
for the statemento Frap identifies labels on the following bases: 
(1) it is not defined by an "opd" and (2) it is the first symbol in 
the statemento If one wishes to have a statement with the first 
symbol undefined, and that symbol is not meant to be a label, then 
the symbol should be preceded by "locc " 

eogo jsp mult 

loc A, the location of A 

6. end (the end of the program) "end" serves three functions: 
(1) punching of a 6-inch leader and trailer, (2) punching of a 
special item at the end of the read-in-mode tape, and (3) signaling 
the end of the program o It is important to remember that the symbol 
"end" must be terminated by a delimiter, such as space or carriage 
return, as is true of all symbols. 

Examples of various uses of "end" are: 

(1) "jmp end, this causes read-in-mode to terminate and jump 

to zeroo " 

(2) "jmp 1277 end, this causes jmp to location 1277o" 

(3) "jmp begin end, this causes a jump to the statement 

labeled 'begin'" 

7c "+" (the plus symbol) Normally the values of every symbol 
on a line are combined by means of the "ior" instruction. The 
operator "+" causes that rule to be suspended for the symbol follow- 
ing the "+" and substitutes the instruction "add" for the "ioro " 
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e.g. "dac 10a +1" If 10a = 145, then the statement is 
equivalent to: 
"dac 145 + 1" 
or "dac 146." 

The character "+" is not on the Flexowriter; the "&" is used in 
typing programs . 

8. - (the minus symbol) This operator causes the "sub" 
instruction to be used in combining the following symbol. 

e.g. If, 10a = 145, then 
"dac 10a - 3" 
and "dac 145 - 3" 
and "dac 142" are equivalent. 

9. (location counter) This symbol always has the value 
currently equal to the compiler's location counter. This allows 
symbolic reference to the location of the statement containing the 
operator "<:". 

e.g. "A szf 1 

jmp <: + 2, skip around 

jmp <^ - 2, go back to the szf." 

The program above is equivalent to the following one: 

"A szf 1 
B jmp D 
C jmp A 
D" 

10. con (concise code) This operator causes the concise code 
representation of the first three characters of the following symbol 
to be combined with the rest of the statement. If the symbol follow- 
ing "con" has less than 3 characters, the one or two righthand char- 
acters are left zero. The three characters are packed into one word, 
into bits 0-5, 6-11, 12-17, respectively. 

e.g. "ab con xyz" results in 
273031 in register "ab" 
27 is concise code for x 

30 is concise code for y 

31 is concise code for z 
"con X" has the value 270000. 
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11, , pause The pause operator causes Frap to stop operating 
until the continue button is pushed. "pause" has no other effects. 
It may be used to determine when Frap has reached some point in 
compiling, or else to prevent a tape from running off the reader 
when there is no "end" on the tape^ 

12 „ fix (fix symbol table) When Frap is loaded into the 
computer, some definitions are permanently in the symbol table, 
i.Br, the operation codes, the shift numbers, etc. The operator 
"fix" allows one to add operators to that permanent set. 

eogo "opd multiply jsp 1600 
opd divide jap 1727 
opd stop hit cla cli 
fix pause" 

13 o ext (external symbol) This operator is used to indicate 
symbols that are to be referenced by some other program (compiled 
separately) . 

ecg. "ext mult dap return" 

Here "mult" is the name of a routine that other programs will want 
to refer to. 

eogo "jsp mult" 

During a compilation, "ext" prevents the combining of the value of 
the symbol following it with the value of the rest of the statement 
The values of external symbols may be defined by means of "opd" 
statements, and the "fix" operator, or by a special zero pass. 

Format Control 

In order to allow a neat and standard listing (printout of the 
program) the following conventions may be usedo 

Set up the off-line flexo-writer in the following manner: 

1. left-hand margin at 8 

2. 1st tab at 24 

3o right-hand margin at 78 

Always tab prior tc the first operation code, and nowhere else, 1,6 
one tab per line. 
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e.g, "10a (tab) jmp (space) A (carriage return) 
(tab) hit" 

Zero pass 

Zero pass and "ext" are used in order to allow the compilation 
of multi-program systems. This allows some programs to make refer- 
ences to other programs, while allowing various programs to use 
internal names that are not unique. The mode of operation is as 
follows: 

Ic All external symbols are prefixed by "ext" when they are 
used as a label o 

e.g. "ext mult dap return 
lac mult -1 



etc. " 

2 - All origins of subroutines are given in symbolic form if 
one does not desire a fixed location for the program. 

e.g. "ext divide org divide 
dap 



etc. " 

3. When compiling, turn sense switch 3 up (on) and run each 
tape through the zero pass once, and in the order desired o 

4c With sense switch 3 down, compile each program (two passes 
each) , in any order « 

5. Reload Frap prior to compiling some other system, or pro- 
grams not connected to the set just compiled ^ 

Sense Switch Usage 

1. Sense switch 1^ If this switch is down, no effect. If it 
is up, then value used to reset the location counter in an "org" 
statement is taken from the test-word switches rather than from the 
value of the origin statements 
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2o Sense switch 2o If this switch is down, no effect. If it 
is up, then on the second pass a listing will be typed out on the 
on-line typewriter, simultaneously with the punchouto The listing is 
an identical copy of the program, as typed, with, in addition, two 
octal numbers typed at the extreme righto These two numbers are 
(1) the location of the output data (the instruction) and (2) the 
actual data put out, in octal o 

3o Sense switch 3o If this switch is down, no effect. If it 
is up, then the computer will perform a zero pasSo 

4o Sense switch 6o If sense switch 6 is down, no effect. If 
it is up, then the symbol table will be printed out at the end of 
the pass (first or second pass) . 
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Error Indications 

If the computer stops running prior to completion of a pass, 
the cause may usually be deduced by the location of the halt (the 
number in the program counter) and by the number in the Accumulator. 
Below is a table of standard error halts o 



Program 
Counter 



Accumulator 



Cause and Remedy 



152 
200 

200 
200 
251 



unimportant 
71 or 765 

145 or 315 

763 

unimportant 



260 


unimportant 


604 


unimportant 


625 


unimportant 


706 


unimportant 


1016 


unimportant 



Turn the typewriter on 

Machine error on Frap not in memory 
correctly. Reload Frap and try again. 

No more room in table area. Divide 
the program into smaller routines 
and re-assemble o 

The symbol being defined in an opd 
statement was previously defined. 
To redefine the symbol, continue o 

Parity error (the bad character is in 
register 400) Continue or start at 
251 to use the bad character ^ start 
at 234 to skip the bad character. 

Turn the typewriter on. 

Turn the punch on= 

Turn the reader on,. 

Turn the typewriter on. 

The pause caused by a pause control 
word; continue o 



ADDENDUM 



Changes to FRAP 22 January 1961 - 



The following changes have been made to FRAP and they are presently 
incorporated in the copies of FRAP which are in the tape bin in the 
Computer Room at BBN. 

1. FRAP now produces leader and trailer on the read in mode 
output tape with the seven hole punched. 

2. The function of sense switch #1 is changed in the following 
manner. 

a. Sense switch #1 will have no effect on origin statements. 

b. If sense switch #1 is up FRAP will set the location 
counter to the value in the address part of the test 
word at the beginning of pass 0, 1, or 2. 

3. The "ext" symbol has been fixed so that a tape incorporating 
"ext" symbols will assemble properly if it is assembled by 
itself with only a first and second pass. 

4. The "ext" symbol has been fixed so that a line with only the 
ext and a symbol will assemble properly. 

5. The following new symbols have been defined in FRAP. 

xec This symbol means the same as "xct" and is defined in addition 
to "xct" as having the octal value 100000. 

nop This symbol is defined to have the octal value 760000. It is 
a conmand for no operation. 

This symbol is defined as having the octal value 000000. It 
is a null symbol. 

sbO These symbols are defined as having the octal values 000000, ' 

sbl 000004, 000010, 000074. They designate the register 

sb2 into which the accumulator will be deposited upon actuation 

... of a sequence break on the channel corresponding to the 

... number in the symbol. For any particular sequence break 

sbl7 channel the accumulator will be deposited in the register 
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defined by the symbol for that channel , the program counter 
will be deposited in the register defined in the symbol 
plus 1, the in-out register will be deposited in the loca- 
tion defined by the symbol plus 2, and the computer will 
jump to the location defined by the symbol plus 3. 

6. The symbols which previously designated the sequence break 
registers (registers to 77) have been eliminated. 

7. The symbols tyo-1, tyi-1, ppa-1, ppb-1 have been eliminated. 
To designate typewriter or punch 1, use the symbol defining 
the operation dasired such as tyo or ppb followed by the 
symbol "cl". 

8. The position of the equivalence table in FRAP has been moved 
down in memory so that the binary punch load package in the 
high position may occupy core at the same time as FRAP. The 
present top of the equivalence table is 7377, 

9. During a listing FRAP will space over page boundaries. The 
listing will type out 60 lines then space 6 so that if the 
listing is started 3 lines below the top page boundary it will 
thereafter space over succeeding boundaries. 

The new sense switch #1 option will be useful in two areas. 

a. When making the pass on a group of programs all having 
symbolic origins sense switch #1 may be switched up and the 
test word set to the desired origin of the first tape in a 
group while reading in the first tape. Then sense switch 
#1 should be switched down and succeeding tapes will have 
their origins defined at locations immediately following 
the previous program. 

b. For test assembly of a program having a symbolic origin 
sense switch #1 may be switched up and the test word set 
to the value desired for the origin of the tape on the 

test assembly and a pass 1 and 2 performed. The sense switch 
need not be left up during the second pass; however, it will 
not affect the assembly in any way if it is . 
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SYMBOLS DEFINED IN FRAP 22 Jan 1961 



Instruction List 
Svmbol Octal Value 



Operation Group 


In-Gut Transfer Group 


The 


"channel 


." symbols 


for SB 


acici 


400000 




iot 


720000 




cO 







and 


020000 




rpa 


720001 




cl 


000100 




cal 


160000 




rpb 


720002 




c2 


000200 




dac 


240000 




rrb 


720030 




c3 


000300 




cJap 


260000 




tyo 


720003 




c4 


000400 




dio 


320000 




tyi 


720004 




c5 


000500 




dip 


300000 




ppa 


720005 




c6 


000600 




dis 


560000 




ppb 


720006 




c7 


000700 




dzm 


340000 




dpy 


720007 




clO 


001000 




idx 


440000 




srb 


720021 




ell 


001100 




ior 


040000 




rcb 


720031 




cl2 


001200 




isp 


460000 




cnv 


720040 




cl3 


001300 




jda 


170000 










cl4 


001400 




jmp 


600000 


Sequence : 


Break Group 




cl5 


001500 




jsp 


620000 




esm 


720055 




cl6 


001600 




lac 


200000 




Ism 


720054 




cl7 


001700 




law 


700000 




asc 


720051 




c20 


000003 




lio 


220000 




dsc 


720050 




Symbols 


1 for the SB Storage 


mus 


540000 




isb 


720052 






Positions 




,sad 


500000 




* 


010000 










.J as 


520000 




the ( 


defer or wait 


symbol sbO 


000000 




sub 


420000 




loc 


000000 




sbl 


000004 




xct 


100000 




the ] 


null symbol 




sb2 


000010 




xor 


060000 




• • 


000000 




sb3 


14 










another null symbol 


3b4 


20 




Skip < 


Sroup 




nop 


760000 




sb5 


24 




skp 


640000 




a no 


operation symbol 


sb6 


30 




basic skip group 


code 








sb7 


34 




sma 


640400 




Shift-] 


Rotate Group 




sblO 


40 




spa 
spi 
sza 


640200 
642000 
640100 




ral 
rar 


661000 
671000 




sbll 
sbl 2 
sbl 3 


44 
50 
54 




szf 


640000 




rcl 


663000 




sbl4 


60 




szo 
szs 


641000 
640000 




rcr 
ril 


673000 
662000 




sbl 5 
sbl 6 


64 
70 




skip 


640600 




rir 
sal 


672000 
665000 




sbl 7 


74 




a ; 


sma and spa to 


make 


sar 


675000 


for 


RLS and 


ALT 




an 


unconditional 


skip 


scl 


667000 




xec 


100000 
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Operate Group 



The "extent of shift-rotate" symbols 



opr 


760000 


cla 


760200 


elf 


760000 


cli 


764000 


cma 


761000 


hit 


760400 


lat 


762200 


stf 


760010 


lap 


760300 



si 


1 


s2 


3 


s3 


7 


s4 


17 


s5 


37 


s6 


77 


s7 


177 


s8 


377 


s9 


777 



Control Symbols Meaning 



Symbol 


Meaning 


-> 


Location Counter 


+ 


Plus 


- 


Minus 


org 


Origin 


con 


Concise 


ext 


External 


end 


End 


pause 


Pause 


^pd 


Operation Define 



